home *** CD-ROM | disk | FTP | other *** search
/ Internet Info 1994 March / Internet Info CD-ROM (Walnut Creek) (March 1994).iso / networking / osi / quipu / quipu-7-patch.1 < prev    next >
Text File  |  1991-11-21  |  24KB  |  832 lines
  1. Dear Camayocs,
  2.  
  3. Included below is Patch #1 for QUIPU-7.0.  
  4.  
  5. The major aim of the patch is to fix DSA reliability problems. 
  6. The fixes include:
  7.     
  8.     Fixes to prevent replicated EDB filling the Disk with garbage.    
  9.     Protocol alignment for an obsure read operation.
  10.     Test for hypothetcial deadlock case.
  11.     Fix to correctly load 'NULL' EDB files.
  12.     Fix to 'alias' indexing problem.
  13.     A fix to the X.25 handler to allow for 'quick' connections!
  14.     Fix to close the quipu.log file periodically.
  15.     Fixes to the scheduling code to increase DSA reliability.
  16.  
  17. For DUAs we have included a fix to the Quality of Service and
  18. T.61 string syntax handlers. 
  19.  
  20. The patch should be applied to the ISODE-7.0 source tree.  
  21. You will then need to re-compile ISODE and QUIPU.  To do this you
  22. should use 
  23.  
  24.     cd isode-7.0
  25.        ./make all all-quipu
  26.     su
  27.     ./make inst-all inst-quipu
  28.  
  29. And if you installed the "little" dish binaries you should do
  30.  
  31.     cd others/quipu/uips/dish
  32.     ./make all 
  33.     su
  34.     ./make inst-all
  35.  
  36.  
  37. Thanks to Paul Barker, Tim Howes, Mark Prior, Mike Roe, Thomas Lenggenhager, 
  38. George Michaelson, Oliver Wenzel, and the Giant Tortoise DSA for 
  39. helping detect and fix these bugs.
  40.  
  41. Colin
  42.  
  43.  
  44. *** /tmp/RCSAa10173    Wed Oct 23 11:39:17 1991
  45. --- tsap/tp0ts.c    Wed Oct 23 10:59:06 1991
  46. ***************
  47. *** 121,127 ****
  48.       if (t = tb -> tb_retry) {
  49.       tb -> tb_retry = NULL;
  50.   
  51. !     if (async)
  52.           switch ((*tb -> tb_retryfnx) (tb, td)) {
  53.           case NOTOK:
  54.                   goto out;
  55. --- 121,127 ----
  56.       if (t = tb -> tb_retry) {
  57.       tb -> tb_retry = NULL;
  58.   
  59. !     if (async && tb -> tb_retryfnx)
  60.           switch ((*tb -> tb_retryfnx) (tb, td)) {
  61.           case NOTOK:
  62.                   goto out;
  63. *** /tmp/RCSAa10173    Wed Oct 23 11:39:18 1991
  64. --- tsap/ts2sunlink.c    Wed Oct 23 10:58:40 1991
  65. ***************
  66. *** 175,181 ****
  67.       register struct tp4pkt *t;
  68.   
  69.       t = NULL;
  70. !     if (async)
  71.       switch ((*tb -> tb_retryfnx) (tb, td)) {
  72.           case NOTOK:
  73.               goto out;
  74. --- 175,181 ----
  75.       register struct tp4pkt *t;
  76.   
  77.       t = NULL;
  78. !     if (async && tb -> tb_retryfnx)
  79.       switch ((*tb -> tb_retryfnx) (tb, td)) {
  80.           case NOTOK:
  81.               goto out;
  82. *** /tmp/RCSAa10173    Wed Oct 23 11:39:19 1991
  83. --- tsap/ts2tcp.c    Wed Oct 23 10:57:33 1991
  84. ***************
  85. *** 189,194 ****
  86. --- 189,196 ----
  87.   #endif
  88.   #endif
  89.   
  90. +     tb -> tb_retryfnx = NULLIFP;    /* No need... */
  91. + 
  92.       return DONE;
  93.   }
  94.   
  95. *** /tmp/RCSAa10173    Wed Oct 23 11:39:19 1991
  96. --- tsap/ts2tli.c    Wed Oct 23 10:58:54 1991
  97. ***************
  98. *** 459,465 ****
  99.       if (tb->tb_cc == -1) { /* call not yet connected */
  100.       struct TSAPaddr ta;
  101.   
  102. !     if (async) {
  103.           switch ((*tb -> tb_retryfnx) (tb, td)) {
  104.           case NOTOK:
  105.           goto out;
  106. --- 459,465 ----
  107.       if (tb->tb_cc == -1) { /* call not yet connected */
  108.       struct TSAPaddr ta;
  109.   
  110. !     if (async && tb -> tb_retryfnx) {
  111.           switch ((*tb -> tb_retryfnx) (tb, td)) {
  112.           case NOTOK:
  113.           goto out;
  114. *** /tmp/RCSAa10173    Wed Oct 23 11:39:20 1991
  115. --- tsap/ts2x25.c    Wed Oct 23 10:57:34 1991
  116. ***************
  117. *** 146,151 ****
  118. --- 146,153 ----
  119.       (void) XTService (tb);      /* in case pktsize changed... */
  120.       LLOG (x25_log, LLOG_NOTICE,
  121.         ("connection %d to %s", fd, na2str (remote)));
  122. + 
  123. +     tb -> tb_retryfnx = NULLIFP;    /* No need... */
  124.   
  125.       return DONE;
  126.   }
  127.  
  128.  
  129. *** /tmp/RCSAa07079    Tue Nov 19 13:13:36 1991
  130. --- quipu/get_dsa_info.c    Tue Nov 19 13:10:00 1991
  131. ***************
  132. *** 306,313 ****
  133.           break;
  134.   
  135.       case DI_TASK:
  136. !         task_dsa_info_wakeup(di);
  137. !         di_free(di);
  138.           break;
  139.   
  140.       default:
  141. --- 306,313 ----
  142.           break;
  143.   
  144.       case DI_TASK:
  145. !         if ( task_dsa_info_wakeup(di) )
  146. !         di_free(di);
  147.           break;
  148.   
  149.       default:
  150. *** /tmp/RCSAa23005    Thu Nov 14 16:22:36 1991
  151. --- quipu/ds_read.c    Thu Nov 14 16:16:25 1991
  152. ***************
  153. *** 160,172 ****
  154.                   quipu_ctx, realtarget)) != NULLATTR)
  155.                   goto out;
  156.   
  157.               error->dse_type = DSE_ATTRIBUTEERROR;
  158.               error->ERR_ATTRIBUTE.DSE_at_name = get_copy_dn (entryptr);
  159.               error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_what =DSE_AT_NOSUCHATTRIBUTE;
  160. !             if (arg->rda_eis.eis_select != NULLATTR)
  161. !                 error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = AttrT_cpy(arg->rda_eis.eis_select->attr_type);
  162. !             else
  163. !                 error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = NULLAttrT;
  164.               error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_value = NULLAttrV;
  165.               error->ERR_ATTRIBUTE.DSE_at_plist.dse_at_next = DSE_AT_NOPROBLEM;
  166.               dn_free (realtarget);
  167. --- 160,174 ----
  168.                   quipu_ctx, realtarget)) != NULLATTR)
  169.                   goto out;
  170.   
  171. +             if (arg->rda_eis.eis_select == NULLATTR)
  172. +                 goto out;
  173. + 
  174.               error->dse_type = DSE_ATTRIBUTEERROR;
  175.               error->ERR_ATTRIBUTE.DSE_at_name = get_copy_dn (entryptr);
  176.               error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_what =DSE_AT_NOSUCHATTRIBUTE;
  177. !             error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = 
  178. !                     AttrT_cpy(arg->rda_eis.eis_select->attr_type);
  179. ! 
  180.               error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_value = NULLAttrV;
  181.               error->ERR_ATTRIBUTE.DSE_at_plist.dse_at_next = DSE_AT_NOPROBLEM;
  182.               dn_free (realtarget);
  183. ***************
  184. *** 206,219 ****
  185.       }
  186.   
  187.       if ((result->rdr_entry.ent_attr = eis_select (arg->rda_eis,entryptr, dsp ? NULLDN : binddn, quipu_ctx, realtarget)) == NULLATTR)
  188. !         if (! arg->rda_eis.eis_allattributes) {
  189.               error->dse_type = DSE_ATTRIBUTEERROR;
  190.                           error->ERR_ATTRIBUTE.DSE_at_name = get_copy_dn (entryptr);
  191.                           error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_what =DSE_AT_NOSUCHATTRIBUTE;
  192. !             if (arg->rda_eis.eis_select != NULLATTR)
  193. !                             error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = AttrT_cpy(arg->rda_eis.eis_select->attr_type);
  194. !             else
  195. !                             error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = NULLAttrT;
  196.                           error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_value = NULLAttrV;
  197.                           error->ERR_ATTRIBUTE.DSE_at_plist.dse_at_next = DSE_AT_NOPROBLEM;
  198.               dn_free (realtarget);
  199. --- 208,220 ----
  200.       }
  201.   
  202.       if ((result->rdr_entry.ent_attr = eis_select (arg->rda_eis,entryptr, dsp ? NULLDN : binddn, quipu_ctx, realtarget)) == NULLATTR)
  203. !         if ((! arg->rda_eis.eis_allattributes) && arg->rda_eis.eis_select) {
  204.               error->dse_type = DSE_ATTRIBUTEERROR;
  205.                           error->ERR_ATTRIBUTE.DSE_at_name = get_copy_dn (entryptr);
  206.                           error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_what =DSE_AT_NOSUCHATTRIBUTE;
  207. !                     error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = 
  208. !                 AttrT_cpy(arg->rda_eis.eis_select->attr_type);
  209. ! 
  210.                           error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_value = NULLAttrV;
  211.                           error->ERR_ATTRIBUTE.DSE_at_plist.dse_at_next = DSE_AT_NOPROBLEM;
  212.               dn_free (realtarget);
  213.  
  214.  
  215.  
  216. *** /tmp/RCSAa11110    Thu Oct 17 14:15:48 1991
  217. --- quipu/shadow.c    Thu Oct 17 13:51:18 1991
  218. ***************
  219. *** 58,64 ****
  220.   extern AttributeType at_xref;
  221.   extern AttributeType at_nssr;
  222.   extern AttributeType at_objectclass;
  223. - extern Attr_Sequence cpy_as_comp();
  224.   extern short syntax_dn;
  225.   
  226.   typedef struct _atlist {
  227. --- 58,63 ----
  228. ***************
  229. *** 357,363 ****
  230.                           "external reference missing"));
  231.               return;
  232.           }
  233. !         new_as = as_merge (new_as, cpy_as_comp (as));
  234.   
  235.           if ((as = as_find_type (new_as, at_objectclass)) == NULLATTR) {
  236.               LLOG (log_dsap, LLOG_EXCEPTIONS, (
  237. --- 356,362 ----
  238.                           "external reference missing"));
  239.               return;
  240.           }
  241. !         new_as = as_merge (new_as, as_comp_cpy (as));
  242.   
  243.           if ((as = as_find_type (new_as, at_objectclass)) == NULLATTR) {
  244.               LLOG (log_dsap, LLOG_EXCEPTIONS, (
  245.  
  246.  
  247.  
  248. *** /tmp/RCSAa02760    Mon Oct 14 12:47:21 1991
  249. --- dsap/common/qos.c    Mon Oct 14 12:46:55 1991
  250. ***************
  251. *** 354,362 ****
  252.       }
  253.       attrQoS_print (ps, p -> dit_quality, format);
  254.       }
  255. !     if (a -> dit_description)
  256. !     ps_printf (ps, format == READOUT ? "\n%*s(%s)" : " # %s",
  257. !            a -> dit_description, qos_indent, "");
  258.   }
  259.   
  260.   static struct attrQoS *str2attrQoS (str)
  261. --- 359,371 ----
  262.       }
  263.       attrQoS_print (ps, p -> dit_quality, format);
  264.       }
  265. !     if (a -> dit_description) {
  266. !     if (format == READOUT)
  267. !         ps_printf (ps, "\n%*s(%s)", qos_indent, 
  268. !            a -> dit_description);
  269. !     else
  270. !         ps_printf (ps, " # %s", a -> dit_description);
  271. !     }
  272.   }
  273.   
  274.   static struct attrQoS *str2attrQoS (str)
  275.  
  276.  
  277. *** /tmp/RCSAa24516    Thu Nov  7 10:35:20 1991
  278. --- dsap/common/string.c    Thu Nov  7 10:34:55 1991
  279. ***************
  280. *** 88,101 ****
  281.       0xe5, '?', '?', '?', '?', '?', '?', '?', '?', 
  282.   
  283.   /* Diaresis upper case */
  284. !     0xc4, '?', 0xc9, 0xcd, '?', 0xd3, 0xda, 0x82, 
  285.   /* Diaresis lower case */
  286. !     0xe4, '?', 0xe9, 0xed, '?', 0xf3, 0xfa, 0xff, '"', 
  287.   
  288.   /* Umlaut upper case */
  289. !     0xc4, '?', 0xc9, 0xcd, '?', 0xd3, 0xda, 0x82,  
  290.   /* Umlaut lower case */
  291. !     0xe4, '?', 0xe9, 0xed, '?', 0xf3, 0xfa, 0xff, '"', 
  292.   
  293.   /* Ring upper case */
  294.       0xc5, '?', '?', '?', '?', '?', '?', '?', 
  295. --- 94,107 ----
  296.       0xe5, '?', '?', '?', '?', '?', '?', '?', '?', 
  297.   
  298.   /* Diaresis upper case */
  299. !         0xc4, '?', 0xcb, 0xcf, '?', 0xd6, 0xdc, 0x82,
  300.   /* Diaresis lower case */
  301. !         0xe4, '?', 0xeb, 0xef, '?', 0xf6, 0xfc, 0xff, '"',
  302.   
  303.   /* Umlaut upper case */
  304. !         0xc4, '?', 0xcb, 0xcf, '?', 0xd6, 0xdc, 0x82,
  305.   /* Umlaut lower case */
  306. !         0xe4, '?', 0xeb, 0xef, '?', 0xf6, 0xfc, 0xff, '"',
  307.   
  308.   /* Ring upper case */
  309.       0xc5, '?', '?', '?', '?', '?', '?', '?', 
  310. ***************
  311. *** 113,121 ****
  312.       '?', '?', '?', '?', '?', '?', '?', '?',  '_', 
  313.   
  314.   /* Umlaut upper case */
  315. !     0xc4, '?', 0xc9, 0xcd, '?', 0xd3, 0xda, 0x82,
  316.   /* Umlaut lower case */
  317. !     0xe4, '?', 0xe9, 0xed, '?', 0xf3, 0xfa, 0xff, '"', 
  318.   
  319.   /* Cedilla? upper case */
  320.       '?', 0xc7, '?', '?', '?', '?', '?', '?',
  321. --- 119,127 ----
  322.       '?', '?', '?', '?', '?', '?', '?', '?',  '_', 
  323.   
  324.   /* Umlaut upper case */
  325. !         0xc4, '?', 0xcb, 0xcf, '?', 0xd6, 0xdc, 0x82,
  326.   /* Umlaut lower case */
  327. !         0xe4, '?', 0xeb, 0xef, '?', 0xf6, 0xfc, 0xff, '"',
  328.   
  329.   /* Cedilla? upper case */
  330.       '?', 0xc7, '?', '?', '?', '?', '?', '?',
  331.  
  332.  
  333. *** /tmp/RCSAa23601    Thu Aug 22 13:09:42 1991
  334. --- quipu/conn_retry.c    Thu Aug 22 13:06:38 1991
  335. ***************
  336. *** 41,46 ****
  337. --- 41,48 ----
  338.   
  339.   struct connection    * conn_alloc();
  340.   
  341. + static test_deadlock();
  342. + 
  343.   /*
  344.   * Deal with an incoming acceptance of association establishment.
  345.   * Return value says whether anything has happened or not.
  346. ***************
  347. *** 123,129 ****
  348.           /* See if there is another DSA to try... */
  349.           if ((on->on_state != ON_ABANDONED) && (on->on_dsas != NULL_DI_BLOCK)) {    
  350.               LLOG (log_dsap,LLOG_NOTICE,("Trying a different DSA (NOTOK)..."));
  351. !             if (oper_chain (on) == OK) {
  352.                   if (ont == NULLOPER)
  353.                       conn->cn_operlist = onext;
  354.                   else
  355. --- 125,132 ----
  356.           /* See if there is another DSA to try... */
  357.           if ((on->on_state != ON_ABANDONED) && (on->on_dsas != NULL_DI_BLOCK)) {    
  358.               LLOG (log_dsap,LLOG_NOTICE,("Trying a different DSA (NOTOK)..."));
  359. !             if ((test_deadlock(on) == OK) &&
  360. !                (oper_chain (on) == OK)) {
  361.                   if (ont == NULLOPER)
  362.                       conn->cn_operlist = onext;
  363.                   else
  364. ***************
  365. *** 137,143 ****
  366.           }
  367.           conn_extract(conn);
  368.       break;
  369. ! 
  370.       case DONE :
  371.           DLOG (log_dsap,LLOG_NOTICE,( "D-BIND.RETRY DONE (%d)",conn->cn_ad));
  372.           if( (conn->cn_ad == NOTOK) || (conn_req_aux(conn) != OK))
  373. --- 140,146 ----
  374.           }
  375.           conn_extract(conn);
  376.       break;
  377. !         
  378.       case DONE :
  379.           DLOG (log_dsap,LLOG_NOTICE,( "D-BIND.RETRY DONE (%d)",conn->cn_ad));
  380.           if( (conn->cn_ad == NOTOK) || (conn_req_aux(conn) != OK))
  381. ***************
  382. *** 153,159 ****
  383.               /* See if there is another DSA to try... */
  384.               if ((on->on_state != ON_ABANDONED) && (on->on_dsas != NULL_DI_BLOCK)) {    
  385.                   LLOG (log_dsap,LLOG_NOTICE,("Trying a different DSA (DONE)..."));
  386. !                 if (oper_chain (on) == OK) {
  387.                       if (ont == NULLOPER)
  388.                           conn->cn_operlist = onext;
  389.                       else
  390. --- 156,163 ----
  391.               /* See if there is another DSA to try... */
  392.               if ((on->on_state != ON_ABANDONED) && (on->on_dsas != NULL_DI_BLOCK)) {    
  393.                   LLOG (log_dsap,LLOG_NOTICE,("Trying a different DSA (DONE)..."));
  394. !                 if ((test_deadlock(on) == OK) &&
  395. !                    (oper_chain (on) == OK)) {
  396.                       if (ont == NULLOPER)
  397.                           conn->cn_operlist = onext;
  398.                       else
  399. ***************
  400. *** 195,198 ****
  401. --- 199,241 ----
  402.   
  403.       if (pstate != conn->cn_state)
  404.       conn->cn_last_used = timenow;
  405. + }
  406. + 
  407. + 
  408. + static test_deadlock (on)
  409. + struct oper_act    * on;
  410. + {
  411. + struct di_block    * di;
  412. + register int ndi = 0;
  413. + 
  414. +     for (di= on -> on_dsas; di!= NULL_DI_BLOCK; di= di -> di_next) 
  415. +         ndi++;
  416. + 
  417. +     /* To proceed, we need to contact on_dsas. */
  418. +     /* Check they do not rely on the conn that has just failed */
  419. +     /* Possibly a better way of testing this... */
  420. + 
  421. +     for (di= on -> on_dsas; di!= NULL_DI_BLOCK; di= di -> di_next) 
  422. +         if (( di-> di_state == DI_DEFERRED ) &&
  423. +             ( di-> di_perform ) &&
  424. +             ( di-> di_perform-> on_conn ))
  425. +             switch (di-> di_perform-> on_conn-> cn_state) {
  426. +                 case 0:
  427. +                 case CN_FAILED:
  428. +                 ndi--;
  429. +             }
  430. + 
  431. +     if (ndi != 0)
  432. +         return OK;
  433. + 
  434. +     
  435. +     if (on -> on_task) {    
  436. +         on -> on_task -> tk_resp.di_error.de_err.dse_type =
  437. +             DSE_SERVICEERROR;
  438. +         on -> on_task -> 
  439. +             tk_resp.di_error.de_err.ERR_SERVICE.DSE_sv_problem =
  440. +             DSE_SV_UNABLETOPROCEED;
  441. +     }
  442. +     
  443. +     return NOTOK;
  444.   }
  445. *** /tmp/RCSAa23601    Thu Aug 22 13:09:42 1991
  446. --- quipu/get_dsa_info.c    Thu Aug 22 11:10:31 1991
  447. ***************
  448. *** 61,66 ****
  449. --- 61,67 ----
  450.       struct di_block    * di_lookup;
  451.       struct oper_act    * on = NULLOPER;
  452.       int           res;
  453. +     Entry          te = NULLENTRY;
  454.   
  455.       DLOG (log_dsap,LLOG_TRACE,("get_dsa_info()"));
  456.   
  457. ***************
  458. *** 115,132 ****
  459.       }
  460.       }
  461.   
  462. !     if ((res = really_find_entry(dn, TRUE, dn_stack, FALSE, &((*di_p)->di_entry), err, &(di_lookup))) == DS_OK) 
  463.       /* is it really OK ??? */
  464. !     if (((*di_p)->di_entry ->e_data == E_TYPE_CONSTRUCTOR) 
  465. !         || ((*di_p)->di_entry->e_dsainfo == NULL)
  466. !         || ((*di_p)->di_entry->e_dsainfo->dsa_addr == NULLPA)) {
  467.           DN dn_found;
  468.           DLOG(log_dsap, LLOG_NOTICE, ("rfe returned a constructor"));
  469. !         dn_found = get_copy_dn((*di_p)->di_entry);
  470. !         res = constructor_dsa_info(dn_found,dn_stack,FALSE,(*di_p)->di_entry,err,&(di_lookup));
  471.           dn_free (dn_found);
  472. !     } else
  473.           (*di_p)->di_entry->e_refcount++;
  474.   
  475.       switch (res)
  476.       {
  477. --- 116,137 ----
  478.       }
  479.       }
  480.   
  481. !     if ((res = really_find_entry(dn, TRUE, dn_stack, FALSE, &te, 
  482. !                 err, &(di_lookup))) == DS_OK) 
  483.       /* is it really OK ??? */
  484. !     if ((te->e_data == E_TYPE_CONSTRUCTOR) 
  485. !         || (te->e_dsainfo == NULL)
  486. !         || (te->e_dsainfo->dsa_addr == NULLPA)) {
  487.           DN dn_found;
  488.           DLOG(log_dsap, LLOG_NOTICE, ("rfe returned a constructor"));
  489. !         dn_found = get_copy_dn(te);
  490. !         res = constructor_dsa_info(dn_found, dn_stack, FALSE, te,
  491. !                        err, &(di_lookup));
  492.           dn_free (dn_found);
  493. !     } else {
  494. !         (*di_p)->di_entry = te;
  495.           (*di_p)->di_entry->e_refcount++;
  496. +     }
  497.   
  498.       switch (res)
  499.       {
  500. *** /tmp/RCSAa23601    Thu Aug 22 13:09:42 1991
  501. --- quipu/di_block.c    Thu Aug 22 09:19:15 1991
  502. ***************
  503. *** 49,54 ****
  504. --- 49,59 ----
  505.   struct di_block *di;
  506.   {
  507.       DLOG(log_dsap, LLOG_TRACE, ("di_free()"));
  508. + 
  509. +     if (di->di_state == -1) {
  510. +         LLOG (log_dsap,LLOG_EXCEPTIONS, ("duplicate di_free"));
  511. +         return;
  512. +     }
  513.   
  514.       switch (di->di_type) {
  515.         case DI_GLOBAL:     break;
  516.  
  517.  
  518.  
  519. *** /tmp/RCSAa16265    Wed Aug 21 15:59:06 1991
  520. --- quipu/entry_load.c    Wed Aug 21 15:37:27 1991
  521. ***************
  522. *** 362,370 ****
  523.   
  524.           if (file_check(offset, e) == OK) {
  525.                   if ((e->e_children = getentry_block(e, filename)) == NULLAVL) {
  526.               if (e->e_allchildrenpresent != FALSE &&
  527.                   e->e_leaf == FALSE) {
  528. -                 e->e_allchildrenpresent = FALSE;
  529.                   got_all = FALSE;
  530.                   return(OK);
  531.               } else
  532. --- 362,372 ----
  533.   
  534.           if (file_check(offset, e) == OK) {
  535.                   if ((e->e_children = getentry_block(e, filename)) == NULLAVL) {
  536. +             if (parse_status != 0)
  537. +                 return(NOTOK);
  538. + 
  539.               if (e->e_allchildrenpresent != FALSE &&
  540.                   e->e_leaf == FALSE) {
  541.                   got_all = FALSE;
  542.                   return(OK);
  543.               } else
  544. *** dsap/common/_turbo_index.c    Tue Aug 13 13:06:57 1991
  545. --- dsap/common/turbo_index.c    Tue Aug 13 13:07:27 1991
  546. ***************
  547. *** 472,477 ****
  548. --- 472,478 ----
  549.       for ( j = i + 1; pindex->i_nonlocalaliases[ j ]; j++ )
  550.           pindex->i_nonlocalaliases[ j - 1 ] =
  551.               pindex->i_nonlocalaliases[ j ];
  552. +     pindex->i_nonlocalaliases[ j - 1 ] = NULLENTRY;
  553.   
  554.       return;
  555.   }
  556. *** dsap/common/_attribute.c    Mon Aug 12 19:11:30 1991
  557. --- dsap/common/attribute.c    Mon Aug 12 19:11:54 1991
  558. ***************
  559. *** 199,204 ****
  560. --- 199,206 ----
  561.              if (acl->ac_default == NULLACL_INFO)
  562.                  acl->ac_default = acl_default ();
  563.               }
  564. +     } else {
  565. +         eptr->e_acl = NULLACL;
  566.       }
  567.   
  568.       if (as = entry_find_type (eptr,at_edbinfo)) {
  569. *** dsap/common/attribute.c~    Wed Jul 17 12:25:03 1991
  570. --- dsap/common/attribute.c    Mon Aug 12 15:35:30 1991
  571. ***************
  572. *** 368,373 ****
  573. --- 371,377 ----
  574.                      || (AttrT_cmp (as->attr_type,at_alias) == 0)
  575.                      || (AttrT_cmp (as->attr_type,at_inherit) == 0)) {
  576.                       LLOG(log_dsap,LLOG_EXCEPTIONS,("Inherited system attribute only allowed in default case"));
  577. +                     error->dse_type = DSE_ATTRIBUTEERROR;
  578.                       error->ERR_ATTRIBUTE.DSE_at_name = get_copy_dn (eptr);
  579.                       error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_what =DSE_AT_CONSTRAINTVIOLATION;
  580.                       error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = AttrT_cpy (as->attr_type);
  581. ***************
  582. *** 379,384 ****
  583. --- 383,389 ----
  584.                   if (as->attr_value == NULLAV) {
  585.                       if ((nas = entry_find_type (eptr,as->attr_type)) == NULLATTR) {
  586.                           LLOG(log_dsap,LLOG_EXCEPTIONS,("Value missing for always inherited attribute type"));
  587. +                             error->dse_type = DSE_ATTRIBUTEERROR;
  588.                           error->ERR_ATTRIBUTE.DSE_at_name = get_copy_dn (eptr);
  589.                           error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_what =DSE_AT_NOSUCHATTRIBUTE;
  590.                           error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = AttrT_cpy (as->attr_type);
  591. ***************
  592. *** 394,399 ****
  593. --- 399,405 ----
  594.                   if (as->attr_value == NULLAV) {
  595.                       if ((nas = entry_find_type (eptr,as->attr_type)) == NULLATTR) {
  596.                           LLOG(log_dsap,LLOG_EXCEPTIONS,("Value missing for default inherited attribute type"));
  597. +                             error->dse_type = DSE_ATTRIBUTEERROR;
  598.                           error->ERR_ATTRIBUTE.DSE_at_name = get_copy_dn (eptr);
  599.                           error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_what =DSE_AT_NOSUCHATTRIBUTE;
  600.                           error->ERR_ATTRIBUTE.DSE_at_plist.DSE_at_type = AttrT_cpy (as->attr_type);
  601.  
  602. *** /tmp/RCSAa27974    Thu Nov 21 13:36:17 1991
  603. --- dsap/x500as/af.py    Thu Nov 21 13:35:40 1991
  604. ***************
  605. *** 88,93 ****
  606. --- 88,99 ----
  607.           ANY [[a asn]]
  608.               OPTIONAL
  609.       }
  610. +     %D{
  611. +         if ((*parm)->asn == NULLPE)
  612. +             (*parm)->p_type = ALG_PARM_ABSENT;
  613. +         else
  614. +             (*parm)->p_type = ALG_PARM_UNKNOWN;
  615. +     %}
  616.   
  617.   SubjectPublicKeyInfo [[P struct key_info *]]
  618.       ::=
  619. *** dsap/common/_cpair.c       Wed Jul 17 12:25:16 1991
  620. --- dsap/common/cpair.c    Tue Sep 17 14:41:19 1991
  621. ***************
  622. *** 92,98 ****
  623.     str = ptr;
  624.     if ((str != NULLCP) && (index(str, '#') != NULLCP))
  625.     {
  626. !     result->cert = str2cert(str);
  627.       if (result->cert == (struct certificate *) 0)
  628.       {
  629.         free((char *) result);
  630. --- 92,98 ----
  631.     str = ptr;
  632.     if ((str != NULLCP) && (index(str, '#') != NULLCP))
  633.     {
  634. !     result->reverse = str2cert(str);
  635.       if (result->cert == (struct certificate *) 0)
  636.       {
  637.         free((char *) result);
  638.  
  639.  
  640. *** /tmp/RCSAa23032    Thu Nov 21 09:06:53 1991
  641. --- quipu/task_select.c    Thu Nov 21 09:06:27 1991
  642. ***************
  643. *** 40,45 ****
  644. --- 40,54 ----
  645.   time_t lastedb_update;
  646.   struct oper_act * pending_ops = NULLOPER;
  647.   
  648. + #ifndef NO_STATS
  649. + 
  650. + extern LLog * log_stat;
  651. + static time_t last_log_close = (time_t)0;
  652. + #define LOGOPENTIME 60*60    /* Close once every 60 minutes */
  653. + 
  654. + #endif
  655. + 
  656. + 
  657.   struct task_act    * task_select(secs_p)
  658.   int        * secs_p;
  659.   {
  660. ***************
  661. *** 437,442 ****
  662. --- 446,462 ----
  663.           (*secs_p) = 0;    /* let connection be re-used */
  664.          }
  665.       }
  666. + 
  667. + #ifndef NO_STATS
  668. +     if ( (timenow - last_log_close) >= LOGOPENTIME ) {
  669. +     ll_close (log_stat);
  670. +     last_log_close = timenow;
  671. +     } else {
  672. +     if ( (ret_tk == NULLTASK) && (*secs_p >= LOGOPENTIME))
  673. +         *secs_p = LOGOPENTIME;    /* Wake to close log! */
  674. +     }
  675. + #endif
  676. + 
  677.   
  678.       return(ret_tk);
  679.   }
  680. *** /tmp/RCSAa23069    Thu Nov 21 09:16:46 1991
  681. --- dsap/common/entry.c    Thu Nov 21 09:15:01 1991
  682. ***************
  683. *** 36,41 ****
  684. --- 36,46 ----
  685.   AttributeType at_alias;
  686.   AttributeType at_objectclass;
  687.   
  688. + extern int local_master_size;
  689. + extern int local_slave_size;
  690. + extern int local_cache_size;
  691. + 
  692. + 
  693.   directory_free (directory)
  694.   Entry directory;
  695.   {
  696. ***************
  697. *** 47,52 ****
  698. --- 52,67 ----
  699.   
  700.           if (directory->e_children != NULLAVL)
  701.               (void) avl_free(directory->e_children, directory_free);
  702. + 
  703. +         switch (directory->e_data) {
  704. +         case E_TYPE_SLAVE:
  705. +             local_slave_size--; break;
  706. +         case E_DATA_MASTER:
  707. +             local_master_size--; break;
  708. +         case E_TYPE_CACHE_FROM_MASTER:
  709. +             local_cache_size--; break;
  710. +         }
  711. + 
  712.           entry_free(directory);
  713.       }
  714.   }
  715. *** /tmp/RCSAa28299    Thu Nov 21 15:45:25 1991
  716. --- quipu/dsa_chain.c    Thu Nov 21 15:43:54 1991
  717. ***************
  718. *** 995,1002 ****
  719.       */
  720.       sort_dsa_list (&di);
  721.   
  722. !     if (tk == NULLTASK)
  723. !     return;        /* already done it ! */
  724.   
  725.       if(di2cref(di, &(tk->tk_resp.di_error.de_err), tk->tk_conn->cn_ctx) != OK)
  726.       {
  727. --- 995,1006 ----
  728.       */
  729.       sort_dsa_list (&di);
  730.   
  731. !     if (tk == NULLTASK) {
  732. !     if (di->di_oper == NULLOPER)
  733. !         return FALSE;
  734. !     else
  735. !         return TRUE;
  736. !     }
  737.   
  738.       if(di2cref(di, &(tk->tk_resp.di_error.de_err), tk->tk_conn->cn_ctx) != OK)
  739.       {
  740. ***************
  741. *** 1010,1023 ****
  742.           task_conn_extract(tk);
  743.           task_error(tk);
  744.           task_extract(tk);
  745. !         return;
  746.       }
  747. !     return;
  748.       }
  749.   
  750.       task_conn_extract(tk);
  751.       task_error(tk);
  752.       task_extract(tk);
  753.   }
  754.   
  755.   static struct access_point * di2ap (di)
  756. --- 1014,1029 ----
  757.           task_conn_extract(tk);
  758.           task_error(tk);
  759.           task_extract(tk);
  760. !         return TRUE;
  761.       }
  762. !     return TRUE;
  763.       }
  764.   
  765.       task_conn_extract(tk);
  766.       task_error(tk);
  767.       task_extract(tk);
  768. + 
  769. +     return TRUE;
  770.   }
  771.   
  772.   static struct access_point * di2ap (di)
  773. *** /tmp/RCSAa01769    Fri Nov 22 09:37:56 1991
  774. --- others/quipu/uips/dish/Makefile    Fri Nov 22 09:35:04 1991
  775. ***************
  776. *** 154,162 ****
  777.           -@ls -gls $@
  778.           -@echo ""
  779.   
  780.   xquipurc:    quipurc.o $(LIBES)
  781.           $(LDCC) $(LDFLAGS) -o $@ quipurc.o \
  782. !             $(LIBDSAP) $(LIBISODE) $(LSOCKET) $(LIBGDBM)
  783.   
  784.   l-quipurc:;    $(LINT) $(LFLAGS) quipurc.c $(LLIBS) \
  785.               | grep -v "warning: possible pointer alignment problem"
  786. --- 154,165 ----
  787.           -@ls -gls $@
  788.           -@echo ""
  789.   
  790. + # Don't use shared libs for xquipurc.
  791. + 
  792.   xquipurc:    quipurc.o $(LIBES)
  793.           $(LDCC) $(LDFLAGS) -o $@ quipurc.o \
  794. !             $(TOPDIR)libdsap.a $(TOPDIR)libisode.a \
  795. !             $(LSOCKET) $(LIBGDBM)
  796.   
  797.   l-quipurc:;    $(LINT) $(LFLAGS) quipurc.c $(LLIBS) \
  798.               | grep -v "warning: possible pointer alignment problem"
  799. *** /tmp/RCSAa23166    Thu Nov 21 09:36:21 1991
  800. --- dsap/oidtable.oc    Fri Aug 23 08:40:19 1991
  801. ***************
  802. *** 156,164 ****
  803.   
  804.   pilotDSA:     pilotObjectClass.21 : dsa : dSAQuality : 
  805.   
  806. ! qualityLabelledData:     pilotObjectClass.22 : top : dSAQuality : \
  807.       subtreeMinimumQuality, subtreeMaximumQuality
  808.   
  809.   # QUIPU defined object classes
  810.   
  811.   quipuDSA:        quipuObjectClass.1 : dSA : \
  812. --- 162,174 ----
  813.   
  814.   pilotDSA:     pilotObjectClass.21 : dsa : dSAQuality : 
  815.   
  816. ! # Retired - wrong mandatory attribute
  817. ! oldQualityLabelledData:     pilotObjectClass.22 : top : dSAQuality : \
  818.       subtreeMinimumQuality, subtreeMaximumQuality
  819.   
  820. + qualityLabelledData:     pilotObjectClass.23 : top : singleLevelQuality : \
  821. +     subtreeMinimumQuality, subtreeMaximumQuality
  822. + 
  823.   # QUIPU defined object classes
  824.   
  825.   quipuDSA:        quipuObjectClass.1 : dSA : \
  826. *** /tmp/patchlevel    Thu Nov 21 15:56:54 1991
  827. --- quipu/patchlevel    Thu Nov 21 15:56:12 1991
  828. ***************
  829. *** 0 ****
  830. --- 1,1 ----
  831. + 1:Thu Nov 21 15:56:12 GMT 1991
  832.